home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 7 / Amiga Format AFCD07 (Dec 1996, Issue 91).iso / serious / shareware / misc / cpk / include / atoms2.inc < prev   
Text File  |  1994-05-03  |  2KB  |  132 lines

  1. /*
  2.    Object and texture declarations for some stock Atoms. For POV-Ray
  3.    Version 2.0
  4.    Author:
  5.     Eric G. Suchanek, Ph.D.
  6. */
  7.  
  8. /* Must include:
  9. #include "colors.inc"
  10. #include "shapes.inc"
  11. #include "textures.inc"
  12.  and either atoms_cpk.inc or atoms_covalent.inc...
  13. */
  14.  
  15. #declare Atoms_Inc_Temp = version
  16.  
  17. #version 2.0
  18.  
  19. #declare Clear_Atom = texture {
  20.    pigment {color red 1.0 green 1.0 blue 1.0 filter 0.95}
  21.    finish {Shiny
  22.     ambient 0.2
  23.     diffuse 0.0
  24.     reflection 0.05
  25.     refraction 1.0
  26.     ior 1.0
  27.    }
  28. }
  29.  
  30. #declare Atom_N = object {
  31.     sphere {<0.0, 0.0, 0.0> N_RAD }
  32.     texture {
  33.          finish { Shiny }
  34.          pigment {
  35.           color Blue
  36.           quick_color Blue
  37.         }
  38.    }
  39. }
  40.  
  41. #declare Atom_C = object {
  42.     sphere {<0.0, 0.0, 0.0> C_RAD }
  43.     texture {
  44.      finish {Shiny }
  45.      pigment {
  46.         color Green 
  47.       quick_color Green
  48.         }
  49.    }
  50. }
  51.  
  52. #declare Atom_O = object {
  53.     sphere {<0.0, 0.0, 0.0> O_RAD }
  54.         texture {
  55.      finish {Shiny }
  56.      pigment {
  57.         color Red 
  58.       quick_color Red
  59.         }
  60.     }
  61. }
  62.  
  63.  
  64. #declare Atom_S = object {
  65.     sphere {<0.0, 0.0, 0.0> S_RAD }
  66.         texture {
  67.      finish {Shiny }
  68.      pigment {
  69.         color Yellow 
  70.       quick_color Yellow
  71.         }
  72.     }
  73.  
  74. }
  75.  
  76. #declare Atom_P = object {
  77.     sphere {<0.0, 0.0, 0.0> P_RAD }
  78.         texture {
  79.      finish {Shiny }
  80.      pigment {
  81.         color Yellow 
  82.       quick_color Yellow
  83.         }
  84.     }
  85. }
  86.  
  87. #declare Atom_Fe = object {
  88.     sphere {<0.0, 0.0, 0.0> FE_RAD }
  89.         texture {
  90.      finish {Shiny }
  91.      pigment {
  92.         color DarkPurple
  93.       quick_color DarkPurple
  94.         }
  95.     }
  96. }
  97.  
  98. #declare Atom_Ca = object {
  99.     sphere {<0.0, 0.0, 0.0> CA_RAD }
  100.         texture {
  101.      finish {Shiny }
  102.      pigment {
  103.         color White
  104.       quick_color White
  105.         }
  106.     }
  107. }
  108.  
  109. #declare Atom_H = object {
  110.     sphere {<0.0, 0.0, 0.0> H_RAD }
  111.         texture {
  112.      finish {Shiny }
  113.      pigment {
  114.         color VLightGrey
  115.       quick_color VLightGrey
  116.         }
  117.    }
  118. }
  119.  
  120. #declare White_Bond = texture 
  121. {
  122.   finish {Shiny }
  123.   pigment {
  124.        color VLightGrey
  125.        quick_color VLightGrey
  126.           }
  127. }
  128.  
  129.  
  130.  
  131. #version Atoms_Inc_Temp
  132.